| FormShow method |
Applies to
TDUnitDialog
Declaration
Procedure FormShow(Sender: TObject);Implementation
procedure TDUnitDialog.FormShow(Sender: TObject);
begin
if AutoFocusAction.Checked
and RunButton.CanFocus then
RunButton.SetFocus;
End; |
|
|